﻿Imports System.Windows.Forms
Imports System.Data
Partial Public Class UCalendarPop

   

    Private Sub UCalendarPop_Loaded(ByVal sender As Object, ByVal e As System.Windows.RoutedEventArgs) Handles Me.Loaded
        ' Add the monthControl
        Dim monthControl As New MonthCalendar()
        monthControl.Width = 178
        monthControl.Height = 155
        CalenderHost.Child = monthControl

        '''''''''''''''''''''''''''''''''''
        

    End Sub
End Class
